home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 38 / Amiga Format CD38 (1999-03-15)(Future Publishing)(GB)(Track 1 of 3)[!][issue 1999-04].iso / -in_the_mag- / reader_requests / dice_v3.15 / lib / amigalib / beginio.a < prev    next >
Text File  |  1999-01-26  |  264b  |  23 lines
  1.  
  2.         ;   BeginIO(ior)
  3.  
  4.         section text,code
  5.  
  6.         xdef    _hyper_BeginIO
  7.         xdef    _BeginIO
  8.         xdef    @BeginIO
  9.  
  10. _hyper_BeginIO:
  11. _BeginIO:
  12.         move.l    4(sp),A0
  13. @BeginIO:
  14.         move.l    A6,-(sp)
  15.         move.l    A0,A1
  16.         move.l    $14(A0),A6   ; io_Device
  17.         jsr    -30(A6)
  18.         move.l    (sp)+,A6
  19.         rts
  20.  
  21.         END
  22.  
  23.